//Mudando a função da tecla ENTER com TAB em um DBGrid

void_fastcall TForm1::DBGrid1KeyPress(TObject *Sender, char &Key)

{

if( Key == 13 )

{
PostMessage(DBGrid1->Handle,WM_KEYDOWN,VK_TAB,1 );
Key = 0;
}

}